home *** CD-ROM | disk | FTP | other *** search
/ APDL Eductation Resources / APDL Eductation Resources.iso / programs / maths / quad / !Quad / !RunImage < prev    next >
Unknown  |  1994-02-09  |  6.7 KB

open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text

This file was not able to be converted.
This format is not currently supported by dexvert.

ConfidenceProgramDetectionMatch TypeSupport
100% file data default



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 44 10 9f e5 3c 20 9f e5 | 34 30 9f e5 04 00 12 e4 |D...< ..|40......|
|00000010| 04 00 03 e4 04 10 51 e2 | fb ff ff 5a 00 00 8f e2 |......Q.|...Z....|
|00000020| 05 00 00 ef 42 41 53 49 | 43 20 2d 51 75 69 74 20 |....BASI|C -Quit |
|00000030| 40 30 30 30 30 39 30 30 | 30 2c 30 30 30 30 41 41 |@0000900|0,0000AA|
|00000040| 35 38 00 00 58 aa 00 00 | a8 9a 00 00 58 1a 00 00 |58..X...|....X...|
|00000050| 0d 00 01 0f f4 3e 21 52 | 75 6e 49 6d 61 67 65 0d |.....>!R|unImage.|
|00000060| 00 02 30 f4 50 72 6f 64 | 75 63 65 64 20 62 79 20 |..0.Prod|uced by |
|00000070| 42 61 73 43 6f 6d 70 72 | 65 73 73 20 76 31 2e 33 |BasCompr|ess v1.3|
|00000080| 31 20 28 31 38 20 4a 61 | 6e 20 31 39 39 33 29 0d |1 (18 Ja|n 1993).|
|00000090| 00 03 5a 62 6c 6f 63 6b | 5f 6d 65 6d 6f 72 79 25 |..Zblock|_memory%|
|000000a0| 3d 33 2a 32 35 36 3a 69 | 63 6f 6e 5f 6d 65 6d 6f |=3*256:i|con_memo|
|000000b0| 72 79 25 3d 31 30 30 30 | 3a 74 61 73 6b 24 3d a4 |ry%=1000|:task$=.|
|000000c0| 50 28 22 51 75 61 64 72 | 61 74 69 63 20 73 6f 6c |P("Quadr|atic sol|
|000000d0| 76 65 72 22 29 3a f2 58 | 3a f2 65 3a f2 64 3a f2 |ver"):.X|:.e:.d:.|
|000000e0| 59 3a f2 48 3a f2 42 3a | e0 0d 00 04 5f dd f2 65 |Y:.H:.B:|...._..e|
|000000f0| 3a 49 6e 66 6f 57 25 3d | a4 45 28 22 49 6e 66 6f |:InfoW%=|.E("Info|
|00000100| 22 29 3a 4d 61 69 6e 57 | 25 3d a4 45 28 22 49 6e |"):MainW|%=.E("In|
|00000110| 70 75 74 22 29 3a 52 65 | 73 75 6c 74 73 57 25 3d |put"):Re|sultsW%=|
|00000120| a4 45 28 22 52 65 73 75 | 6c 74 22 29 3a f2 4d 28 |.E("Resu|lt"):.M(|
|00000130| 4d 61 69 6e 57 25 29 3a | f2 41 28 4d 61 69 6e 57 |MainW%):|.A(MainW|
|00000140| 25 2c 31 2c 30 29 3a e1 | 0d 00 05 1f dd f2 64 3a |%,1,0):.|......d:|
|00000150| 42 61 72 5f 49 63 6f 6e | 25 3d a4 4a 28 22 21 51 |Bar_Icon|%=.J("!Q|
|00000160| 75 61 64 22 29 3a e1 0d | 00 06 61 dd f2 59 3a 42 |uad"):..|..a..Y:B|
|00000170| 61 72 5f 4d 65 6e 75 25 | 3d a4 4d 28 22 21 51 75 |ar_Menu%|=.M("!Qu|
|00000180| 61 64 5c 49 6e 66 6f 3e | 49 6e 66 6f 57 25 5c 51 |ad\Info>|InfoW%\Q|
|00000190| 75 69 74 22 29 3a 4d 61 | 69 6e 5f 4d 65 6e 75 25 |uit"):Ma|in_Menu%|
|000001a0| 3d a4 4d 28 22 4d 61 69 | 6e 5c 49 6e 66 6f 3e 49 |=.M("Mai|n\Info>I|
|000001b0| 6e 66 6f 57 25 5c 43 61 | 6c 63 75 6c 61 74 65 5c |nfoW%\Ca|lculate\|
|000001c0| 51 75 69 74 22 29 3a e1 | 0d 00 07 11 dd f2 78 28 |Quit"):.|......x(|
|000001d0| 77 69 6e 64 77 25 29 3a | e1 0d 00 08 21 dd f2 49 |windw%):|....!..I|
|000001e0| 28 77 69 6e 64 6f 77 25 | 2c 78 25 2c 79 25 29 3a |(window%|,x%,y%):|
|000001f0| c8 8e 77 69 6e 64 6f 77 | 25 ca 0d 00 09 1a c9 42 |..window|%......B|
|00000200| 61 72 5f 57 69 6e 64 6f | 77 25 3a f2 4b 28 78 25 |ar_Windo|w%:.K(x%|
|00000210| 2c 79 25 29 0d 00 0a 20 | c9 4d 61 69 6e 57 25 3a |,y%)... |.MainW%:|
|00000220| f2 54 28 4d 61 69 6e 5f | 4d 65 6e 75 25 2c 78 25 |.T(Main_|Menu%,x%|
|00000230| 2c 79 25 29 0d 00 0b 07 | cb 3a e1 0d 00 0c 2f dd |,y%)....|.:..../.|
|00000240| f2 5f 28 62 75 74 74 6f | 6e 25 2c 77 69 6e 64 6f |._(butto|n%,windo|
|00000250| 77 25 2c 69 63 6f 6e 25 | 2c 78 25 2c 79 25 29 3a |w%,icon%|,x%,y%):|
|00000260| c8 8e 77 69 6e 64 6f 77 | 25 ca 0d 00 0d 13 c9 42 |..window|%......B|
|00000270| 61 72 5f 57 69 6e 64 6f | 77 25 3a f2 51 0d 00 0e |ar_Windo|w%:.Q...|
|00000280| 1d c9 4d 61 69 6e 57 25 | 3a f2 4f 28 62 75 74 74 |..MainW%|:.O(butt|
|00000290| 6f 6e 25 2c 69 63 6f 6e | 25 29 0d 00 0f 20 c9 52 |on%,icon|%)... .R|
|000002a0| 65 73 75 6c 74 73 57 25 | 3a f2 73 28 62 75 74 74 |esultsW%|:.s(butt|
|000002b0| 6f 6e 25 2c 69 63 6f 6e | 25 29 0d 00 10 07 cb 3a |on%,icon|%).....:|
|000002c0| e1 0d 00 11 23 dd f2 51 | 3a f2 4d 28 4d 61 69 6e |....#..Q|:.M(Main|
|000002d0| 57 25 29 3a f2 41 28 4d | 61 69 6e 57 25 2c 31 2c |W%):.A(M|ainW%,1,|
|000002e0| 30 29 3a e1 0d 00 12 1f | dd f2 4f 28 62 75 74 74 |0):.....|..O(butt|
|000002f0| 6f 6e 25 2c 69 63 6f 6e | 25 29 3a c8 8e 69 63 6f |on%,icon|%):..ico|
|00000300| 6e 25 ca 0d 00 13 15 c9 | 31 3a f2 41 28 4d 61 69 |n%......|1:.A(Mai|
|00000310| 6e 57 25 2c 31 2c 30 29 | 0d 00 14 15 c9 32 3a f2 |nW%,1,0)|.....2:.|
|00000320| 41 28 4d 61 69 6e 57 25 | 2c 32 2c 30 29 0d 00 15 |A(MainW%|,2,0)...|
|00000330| 15 c9 33 3a f2 41 28 4d | 61 69 6e 57 25 2c 33 2c |..3:.A(M|ainW%,3,|
|00000340| 30 29 0d 00 16 09 c9 35 | 3a f2 43 0d 00 17 07 cb |0).....5|:.C.....|
|00000350| 3a e1 0d 00 18 1f dd f2 | 73 28 62 75 74 74 6f 6e |:.......|s(button|
|00000360| 25 2c 69 63 6f 6e 25 29 | 3a c8 8e 69 63 6f 6e 25 |%,icon%)|:..icon%|
|00000370| ca 0d 00 19 14 c9 30 3a | f2 57 28 52 65 73 75 6c |......0:|.W(Resul|
|00000380| 74 73 57 25 29 0d 00 1a | 07 cb 3a e1 0d 00 1b 17 |tsW%)...|..:.....|
|00000390| dd f2 7a 28 6d 65 6e 75 | 25 29 3a c8 8e 6d 65 6e |..z(menu|%):..men|
|000003a0| 75 25 ca 0d 00 1c 11 c9 | 42 61 72 5f 4d 65 6e 75 |u%......|Bar_Menu|
|000003b0| 25 3a f2 55 0d 00 1d 12 | c9 4d 61 69 6e 5f 4d 65 |%:.U....|.Main_Me|
|000003c0| 6e 75 25 3a f2 4e 0d 00 | 1e 07 cb 3a e1 0d 00 1f |nu%:.N..|...:....|
|000003d0| 10 dd f2 55 3a c8 8e a4 | 5a 28 30 29 ca 0d 00 20 |...U:...|Z(0)... |
|000003e0| 06 c9 31 0d 00 21 12 c9 | 32 3a 66 69 6e 69 73 68 |..1..!..|2:finish|
|000003f0| 65 64 25 3d b9 0d 00 22 | 07 cb 3a e1 0d 00 23 10 |ed%=..."|..:...#.|
|00000400| dd f2 4e 3a c8 8e a4 5a | 28 30 29 ca 0d 00 24 06 |..N:...Z|(0)...$.|
|00000410| c9 31 0d 00 25 09 c9 32 | 3a f2 43 0d 00 26 12 c9 |.1..%..2|:.C..&..|
|00000420| 33 3a 66 69 6e 69 73 68 | 65 64 25 3d b9 0d 00 27 |3:finish|ed%=...'|
|00000430| 07 cb 3a e1 0d 00 28 20 | dd f2 71 28 4d 61 69 6e |..:...( |..q(Main|
|00000440| 57 25 2c 69 63 6f 6e 25 | 2c 62 29 3a c8 8e 69 63 |W%,icon%|,b):..ic|
|00000450| 6f 6e 25 ca 0d 00 29 15 | c9 31 3a f2 41 28 4d 61 |on%...).|.1:.A(Ma|
|00000460| 69 6e 57 25 2c 32 2c 30 | 29 0d 00 2a 15 c9 32 3a |inW%,2,0|)..*..2:|
|00000470| f2 41 28 4d 61 69 6e 57 | 25 2c 33 2c 30 29 0d 00 |.A(MainW|%,3,0)..|
|00000480| 2b 09 c9 33 3a f2 43 0d | 00 2c 07 cb 3a e1 0d 00 |+..3:.C.|.,..:...|
|00000490| 2d 4f dd f2 43 3a 61 3d | bb a4 41 28 4d 61 69 6e |-O..C:a=|..A(Main|
|000004a0| 57 25 2c 31 29 3a 62 3d | bb a4 41 28 4d 61 69 6e |W%,1):b=|..A(Main|
|000004b0| 57 25 2c 32 29 3a 63 3d | bb a4 41 28 4d 61 69 6e |W%,2):c=|..A(Main|
|000004c0| 57 25 2c 33 29 3a 64 3d | 28 62 5e 32 29 2d 28 34 |W%,3):d=|(b^2)-(4|
|000004d0| 2a 61 2a 63 29 3a e7 64 | 3e 30 8c f2 44 0d 00 2e |*a*c):.d|>0..D...|
|000004e0| 0b e7 64 3d 30 8c f2 63 | 0d 00 2f 0b e7 64 3c 30 |..d=0..c|../..d<0|
|000004f0| 8c f2 4c 0d 00 30 05 e1 | 0d 00 31 ef dd f2 44 3a |..L..0..|..1...D:|
|00000500| f2 4d 28 52 65 73 75 6c | 74 73 57 25 29 3a 78 3d |.M(Resul|tsW%):x=|
|00000510| 28 2d 62 2b b6 28 64 29 | 29 2f 28 32 2a 61 29 3a |(-b+.(d)|)/(2*a):|
|00000520| 79 3d 28 2d 62 2d b6 28 | 64 29 29 2f 28 32 2a 61 |y=(-b-.(|d))/(2*a|
|00000530| 29 3a f2 50 3a 78 24 3d | c3 28 78 29 3a 72 24 3d |):.P:x$=|.(x):r$=|
|00000540| 22 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 22 3a 79 24 |"-------|----":y$|
|00000550| 3d c3 28 79 29 3a 73 24 | 3d 22 2d 2d 2d 2d 2d 2d |=.(y):s$|="------|
|00000560| 2d 2d 2d 2d 2d 22 3a 54 | 65 78 74 31 24 3d 22 54 |-----":T|ext1$="T|
|00000570| 68 65 20 67 69 76 65 6e | 20 65 71 75 61 74 69 6f |he given| equatio|
|00000580| 6e 20 68 61 73 20 74 77 | 6f 20 72 65 61 6c 22 3a |n has tw|o real":|
|00000590| 54 65 78 74 32 24 3d 22 | 72 6f 75 74 65 73 2e 22 |Text2$="|routes."|
|000005a0| 3a f2 45 28 52 65 73 75 | 6c 74 73 57 25 2c 35 29 |:.E(Resu|ltsW%,5)|
|000005b0| 3a f2 45 28 52 65 73 75 | 6c 74 73 57 25 2c 31 31 |:.E(Resu|ltsW%,11|
|000005c0| 29 3a f2 53 28 52 65 73 | 75 6c 74 73 57 25 2c 38 |):.S(Res|ultsW%,8|
|000005d0| 29 3a f2 53 28 52 65 73 | 75 6c 74 73 57 25 2c 31 |):.S(Res|ultsW%,1|
|000005e0| 33 29 3a f2 46 3a e1 0d | 00 32 85 dd f2 46 3a f2 |3):.F:..|.2...F:.|
|000005f0| 5a 28 52 65 73 75 6c 74 | 73 57 25 2c 35 2c 78 24 |Z(Result|sW%,5,x$|
|00000600| 29 3a f2 5a 28 52 65 73 | 75 6c 74 73 57 25 2c 38 |):.Z(Res|ultsW%,8|
|00000610| 2c 72 24 29 3a f2 5a 28 | 52 65 73 75 6c 74 73 57 |,r$):.Z(|ResultsW|
|00000620| 25 2c 31 31 2c 79 24 29 | 3a f2 5a 28 52 65 73 75 |%,11,y$)|:.Z(Resu|
|00000630| 6c 74 73 57 25 2c 31 33 | 2c 73 24 29 3a f2 5a 28 |ltsW%,13|,s$):.Z(|
|00000640| 52 65 73 75 6c 74 73 57 | 25 2c 32 2c 54 65 78 74 |ResultsW|%,2,Text|
|00000650| 31 24 29 3a f2 5a 28 52 | 65 73 75 6c 74 73 57 25 |1$):.Z(R|esultsW%|
|00000660| 2c 33 2c 54 65 78 74 32 | 24 29 3a e1 0d 00 33 fa |,3,Text2|$):...3.|
|00000670| dd f2 63 3a f2 4d 28 52 | 65 73 75 6c 74 73 57 25 |..c:.M(R|esultsW%|
|00000680| 29 3a 78 3d 2d 62 2f 28 | 32 2a 61 29 3a 79 3d 30 |):x=-b/(|2*a):y=0|
|00000690| 3a f2 50 3a 78 24 3d c3 | 28 78 29 3a 72 24 3d 22 |:.P:x$=.|(x):r$="|
|000006a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 22 3a 79 24 3d |--------|---":y$=|
|000006b0| 22 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 22 3a 73 24 |"-------|----":s$|
|000006c0| 3d 22 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 22 3a 54 |="------|-----":T|
|000006d0| 65 78 74 31 24 3d 22 54 | 68 65 20 67 69 76 65 6e |ext1$="T|he given|
|000006e0| 20 65 71 75 61 74 69 6f | 6e 20 68 61 73 20 6f 6e | equatio|n has on|
|000006f0| 6c 79 20 6f 6e 65 22 3a | 54 65 78 74 32 24 3d 22 |ly one":|Text2$="|
|00000700| 72 65 61 6c 20 72 6f 75 | 74 65 20 28 61 20 72 65 |real rou|te (a re|
|00000710| 70 65 61 74 65 64 20 72 | 6f 75 74 65 29 2e 22 3a |peated r|oute).":|
|00000720| f2 45 28 52 65 73 75 6c | 74 73 57 25 2c 35 29 3a |.E(Resul|tsW%,5):|
|00000730| f2 53 28 52 65 73 75 6c | 74 73 57 25 2c 38 29 3a |.S(Resul|tsW%,8):|
|00000740| f2 53 28 52 65 73 75 6c | 74 73 57 25 2c 31 31 29 |.S(Resul|tsW%,11)|
|00000750| 3a f2 53 28 52 65 73 75 | 6c 74 73 57 25 2c 31 33 |:.S(Resu|ltsW%,13|
|00000760| 29 3a f2 46 3a e1 0d 00 | 34 d2 dd f2 4c 3a f2 4d |):.F:...|4...L:.M|
|00000770| 28 52 65 73 75 6c 74 73 | 57 25 29 3a 7a 3d 28 b6 |(Results|W%):z=(.|
|00000780| 28 94 28 64 29 29 29 2f | 28 32 2a 61 29 3a 72 3d |(.(d)))/|(2*a):r=|
|00000790| 2d 62 2f 28 32 2a 61 29 | 3a 78 24 3d c3 28 72 29 |-b/(2*a)|:x$=.(r)|
|000007a0| 3a 72 24 3d c3 28 7a 29 | 3a 79 24 3d c3 28 72 29 |:r$=.(z)|:y$=.(r)|
|000007b0| 3a 73 24 3d c3 28 7a 29 | 3a 54 65 78 74 31 24 3d |:s$=.(z)|:Text1$=|
|000007c0| 22 54 68 65 20 67 69 76 | 65 6e 20 65 71 75 61 74 |"The giv|en equat|
|000007d0| 69 6f 6e 20 68 61 73 20 | 63 6f 6d 70 6c 65 78 22 |ion has |complex"|
|000007e0| 3a 54 65 78 74 32 24 3d | 22 72 6f 75 74 65 73 2e |:Text2$=|"routes.|
|000007f0| 22 3a f2 45 28 52 65 73 | 75 6c 74 73 57 25 2c 35 |":.E(Res|ultsW%,5|
|00000800| 29 3a f2 45 28 52 65 73 | 75 6c 74 73 57 25 2c 38 |):.E(Res|ultsW%,8|
|00000810| 29 3a f2 45 28 52 65 73 | 75 6c 74 73 57 25 2c 31 |):.E(Res|ultsW%,1|
|00000820| 31 29 3a f2 45 28 52 65 | 73 75 6c 74 73 57 25 2c |1):.E(Re|sultsW%,|
|00000830| 31 33 29 3a f2 46 3a e1 | 0d 00 35 2f dd f2 50 3a |13):.F:.|..5/..P:|
|00000840| 70 3d 28 61 2a 78 5e 32 | 29 2b 62 2a 78 2b 63 3a |p=(a*x^2|)+b*x+c:|
|00000850| 71 3d 28 61 2a 79 5e 32 | 29 2b 62 2a 79 2b 63 3a |q=(a*y^2|)+b*y+c:|
|00000860| e7 79 3d 30 71 3d 30 0d | 00 36 0c e7 70 3d 30 80 |.y=0q=0.|.6..p=0.|
|00000870| 71 3d 30 0d 00 37 16 e7 | a8 28 70 29 3c 3e 30 80 |q=0..7..|.(p)<>0.|
|00000880| a8 28 71 29 3c 3e 30 8c | e0 0d 00 38 05 e1 0d 00 |.(q)<>0.|...8....|
|00000890| 39 2d dd a4 50 28 54 61 | 73 6b 4e 61 6d 65 24 29 |9-..P(Ta|skName$)|
|000008a0| 3a f2 77 3a ee 85 f2 47 | 28 74 61 73 6b 25 2c 54 |:.w:...G|(task%,T|
|000008b0| 61 73 6b 4e 61 6d 65 24 | 29 3a e0 0d 00 3a 4b 24 |askName$|):...:K$|
|000008c0| 62 6c 6f 63 6b 25 3d 22 | 54 41 53 4b 22 3a c8 99 |block%="|TASK":..|
|000008d0| 26 34 30 30 63 30 2c 32 | 30 30 2c 21 62 6c 6f 63 |&400c0,2|00,!bloc|
|000008e0| 6b 25 2c 54 61 73 6b 4e | 61 6d 65 24 b8 76 65 72 |k%,TaskN|ame$.ver|
|000008f0| 73 69 6f 6e 25 2c 74 61 | 73 6b 25 3a 3d 54 61 73 |sion%,ta|sk%:=Tas|
|00000900| 6b 4e 61 6d 65 24 0d 00 | 3b c4 dd f2 77 3a de 62 |kName$..|;...w:.b|
|00000910| 6c 6f 63 6b 25 62 6c 6f | 63 6b 5f 6d 65 6d 6f 72 |lock%blo|ck_memor|
|00000920| 79 25 2c 69 63 6f 6e 73 | 25 69 63 6f 6e 5f 6d 65 |y%,icons|%icon_me|
|00000930| 6d 6f 72 79 25 3a 69 63 | 6f 6e 5f 65 6e 64 25 3d |mory%:ic|on_end%=|
|00000940| 69 63 6f 6e 73 25 2b 69 | 63 6f 6e 5f 6d 65 6d 6f |icons%+i|con_memo|
|00000950| 72 79 25 3a 6e 75 6c 6c | 25 3d 31 3a 64 72 61 77 |ry%:null|%=1:draw|
|00000960| 25 3d 32 3a 70 6f 69 6e | 74 65 72 5f 6c 65 61 76 |%=2:poin|ter_leav|
|00000970| 69 6e 67 25 3d 31 3c 3c | 34 3a 70 6f 69 6e 74 65 |ing%=1<<|4:pointe|
|00000980| 72 5f 65 6e 74 65 72 69 | 6e 67 25 3d 31 3c 3c 35 |r_enteri|ng%=1<<5|
|00000990| 3a 6d 6f 75 73 65 25 3d | 31 3c 3c 36 3a 64 72 61 |:mouse%=|1<<6:dra|
|000009a0| 67 25 3d 31 3c 3c 37 3a | 6b 65 79 25 3d 31 3c 3c |g%=1<<7:|key%=1<<|
|000009b0| 38 3a 6d 65 6e 75 25 3d | 31 3c 3c 39 3a 73 63 72 |8:menu%=|1<<9:scr|
|000009c0| 6f 6c 6c 25 3d 31 3c 3c | 31 30 0d 00 3c d9 6c 6f |oll%=1<<|10..<.lo|
|000009d0| 73 65 5f 63 61 72 65 74 | 25 3d 31 3c 3c 31 31 3a |se_caret|%=1<<11:|
|000009e0| 67 61 69 6e 5f 63 61 72 | 65 74 25 3d 31 3c 3c 31 |gain_car|et%=1<<1|
|000009f0| 32 3a 6d 65 73 73 61 67 | 65 25 3d 28 31 3c 3c 31 |2:messag|e%=(1<<1|
|00000a00| 37 29 2b 28 31 3c 3c 31 | 38 29 3a 72 65 63 6f 72 |7)+(1<<1|8):recor|
|00000a10| 64 65 72 25 3d 31 3c 3c | 31 38 3a 61 63 6b 6e 6f |der%=1<<|18:ackno|
|00000a20| 77 6c 65 64 67 65 25 3d | 31 3c 3c 31 39 3a 77 69 |wledge%=|1<<19:wi|
|00000a30| 6e 64 6f 77 25 3d 30 3a | 73 70 72 69 74 65 73 25 |ndow%=0:|sprites%|
|00000a40| 3d 30 3a 76 65 72 73 69 | 6f 6e 25 3d 30 3a 74 61 |=0:versi|on%=0:ta|
|00000a50| 73 6b 25 3d 30 3a 42 61 | 72 5f 57 69 6e 64 6f 77 |sk%=0:Ba|r_Window|
|00000a60| 25 3d 2d 32 3a 42 61 72 | 5f 49 63 6f 6e 25 3d 30 |%=-2:Bar|_Icon%=0|
|00000a70| 3a 42 61 72 5f 4d 65 6e | 75 25 3d 30 3a 78 5f 6f |:Bar_Men|u%=0:x_o|
|00000a80| 72 69 67 69 6e 25 3d 30 | 3a 79 5f 6f 72 69 67 69 |rigin%=0|:y_origi|
|00000a90| 6e 25 3d 30 3a 53 61 76 | 65 57 69 6e 64 6f 77 25 |n%=0:Sav|eWindow%|
|00000aa0| 3d 2d 33 0d 00 3d 53 6d | 65 73 73 61 67 65 5f 71 |=-3..=Sm|essage_q|
|00000ab0| 75 69 74 25 3d 30 3a 6d | 65 73 73 61 67 65 5f 73 |uit%=0:m|essage_s|
|00000ac0| 61 76 65 25 3d 32 3a 6d | 65 73 73 61 67 65 5f 6c |ave%=2:m|essage_l|
|00000ad0| 6f 61 64 25 3d 33 3a 6d | 6f 75 73 65 5f 62 75 74 |oad%=3:m|ouse_but|
|00000ae0| 74 6f 6e 25 3d 32 3a 73 | 61 76 65 5f 65 76 65 6e |ton%=2:s|ave_even|
|00000af0| 74 25 3d 30 3a e1 0d 00 | 3e 23 dd f2 47 28 74 61 |t%=0:...|>#..G(ta|
|00000b00| 73 6b 25 2c 54 61 73 6b | 4e 61 6d 65 24 29 3a ea |sk%,Task|Name$):.|
|00000b10| 58 24 2c 78 25 3a ee 85 | 87 0d 00 3f bd 78 25 3d |X$,x%:..|...?.x%=|
|00000b20| 9e 3a 58 24 3d f6 24 2b | 22 20 61 74 20 6c 69 6e |.:X$=.$+|" at lin|
|00000b30| 65 20 22 2b c3 28 78 25 | 81 31 30 29 3a de 45 72 |e "+.(x%|.10):.Er|
|00000b40| 72 6f 72 4d 73 67 25 33 | 36 3a 45 72 72 6f 72 4d |rorMsg%3|6:ErrorM|
|00000b50| 73 67 25 21 30 3d 33 36 | 3a 45 72 72 6f 72 4d 73 |sg%!0=36|:ErrorMs|
|00000b60| 67 25 21 31 32 3d 30 3a | 45 72 72 6f 72 4d 73 67 |g%!12=0:|ErrorMsg|
|00000b70| 25 21 31 36 3d 26 38 31 | 30 38 30 3a 45 72 72 6f |%!16=&81|080:Erro|
|00000b80| 72 4d 73 67 25 21 32 30 | 3d 78 25 3a 24 28 45 72 |rMsg%!20|=x%:$(Er|
|00000b90| 72 6f 72 4d 73 67 25 2b | 32 34 29 3d 22 21 52 75 |rorMsg%+|24)="!Ru|
|00000ba0| 6e 49 6d 61 67 65 20 20 | 20 22 3a c8 99 26 34 30 |nImage | ":..&40|
|00000bb0| 30 65 37 2c 31 37 2c 45 | 72 72 6f 72 4d 73 67 25 |0e7,17,E|rrorMsg%|
|00000bc0| 3a f2 4a 28 54 61 73 6b | 4e 61 6d 65 24 2c 58 24 |:.J(Task|Name$,X$|
|00000bd0| 29 3a f2 42 3a e1 0d 00 | 40 1f dd f2 42 3a c8 99 |):.B:...|@...B:..|
|00000be0| 26 34 30 30 64 64 2c 74 | 61 73 6b 25 2c 22 54 41 |&400dd,t|ask%,"TA|
|00000bf0| 53 4b 22 3a e1 0d 00 41 | 52 dd f2 48 3a 66 69 6e |SK":...A|R..H:fin|
|00000c00| 69 73 68 65 64 25 3d a3 | 3a 6d 61 73 6b 25 3d 33 |ished%=.|:mask%=3|
|00000c10| 36 30 39 3a f5 3a c8 99 | 26 34 30 30 63 37 2c 6d |609:.:..|&400c7,m|
|00000c20| 61 73 6b 25 2c 62 6c 6f | 63 6b 25 b8 65 76 65 6e |ask%,blo|ck%.even|
|00000c30| 74 25 3a c8 8e a4 4e 28 | 65 76 65 6e 74 25 2c 62 |t%:...N(|event%,b|
|00000c40| 6c 6f 63 6b 25 29 ca 0d | 00 42 17 c9 2d 31 3a f2 |lock%)..|.B..-1:.|
|00000c50| 45 76 65 6e 74 5f 53 61 | 76 65 46 69 6c 65 0d 00 |Event_Sa|veFile..|
|00000c60| 43 06 c9 30 0d 00 44 86 | c9 31 3a c8 99 26 34 30 |C..0..D.|.1:..&40|
|00000c70| 30 63 38 2c 2c 62 6c 6f | 63 6b 25 b8 6d 6f 72 65 |0c8,,blo|ck%.more|
|00000c80| 25 3a 78 5f 6f 72 69 67 | 69 6e 25 3d a4 47 28 62 |%:x_orig|in%=.G(b|
|00000c90| 6c 6f 63 6b 25 29 3a 79 | 5f 6f 72 69 67 69 6e 25 |lock%):y|_origin%|
|00000ca0| 3d a4 43 28 62 6c 6f 63 | 6b 25 29 3a c8 95 6d 6f |=.C(bloc|k%):..mo|
|00000cb0| 72 65 25 3a c8 99 26 38 | 31 36 38 31 2c 2c 62 6c |re%:..&8|1681,,bl|
|00000cc0| 6f 63 6b 25 3a f2 78 28 | 62 6c 6f 63 6b 25 21 30 |ock%:.x(|block%!0|
|00000cd0| 29 3a c8 99 26 34 30 30 | 63 61 2c 2c 62 6c 6f 63 |):..&400|ca,,bloc|
|00000ce0| 6b 25 b8 6d 6f 72 65 25 | 3a ce 0d 00 45 24 c9 32 |k%.more%|:...E$.2|
|00000cf0| 3a 77 69 6e 64 6f 77 25 | 3d 21 62 6c 6f 63 6b 25 |:window%|=!block%|
|00000d00| 3a f2 52 28 77 69 6e 64 | 6f 77 25 2c 31 29 0d 00 |:.R(wind|ow%,1)..|
|00000d10| 46 22 c9 33 3a 77 69 6e | 64 6f 77 25 3d 21 62 6c |F".3:win|dow%=!bl|
|00000d20| 6f 63 6b 25 3a f2 57 28 | 77 69 6e 64 6f 77 25 29 |ock%:.W(|window%)|
|00000d30| 0d 00 47 06 c9 34 0d 00 | 48 06 c9 35 0d 00 49 5c |..G..4..|H..5..I\|
|00000d40| c9 36 3a 62 75 74 74 6f | 6e 25 3d 62 6c 6f 63 6b |.6:butto|n%=block|
|00000d50| 25 21 38 3a 77 69 6e 64 | 6f 77 25 3d 62 6c 6f 63 |%!8:wind|ow%=bloc|
|00000d60| 6b 25 21 31 32 3a 69 63 | 6f 6e 25 3d 62 6c 6f 63 |k%!12:ic|on%=bloc|
|00000d70| 6b 25 21 31 36 3a 78 25 | 3d 62 6c 6f 63 6b 25 21 |k%!16:x%|=block%!|
|00000d80| 30 3a 79 25 3d 62 6c 6f | 63 6b 25 21 34 3a c8 8e |0:y%=blo|ck%!4:..|
|00000d90| 62 75 74 74 6f 6e 25 ca | 0d 00 4a 18 c9 32 3a f2 |button%.|..J..2:.|
|00000da0| 49 28 77 69 6e 64 6f 77 | 25 2c 78 25 2c 79 25 29 |I(window|%,x%,y%)|
|00000db0| 0d 00 4b 74 7f 3a c8 99 | 26 38 31 36 38 30 2c 2c |..Kt.:..|&81680,,|
|00000dc0| 62 6c 6f 63 6b 25 3a f2 | 5f 28 62 75 74 74 6f 6e |block%:.|_(button|
|00000dd0| 25 2c 77 69 6e 64 6f 77 | 25 2c 69 63 6f 6e 25 2c |%,window|%,icon%,|
|00000de0| 78 25 2c 79 25 29 3a 62 | 6c 6f 63 6b 25 21 38 3d |x%,y%):b|lock%!8=|
|00000df0| 30 3a 62 6c 6f 63 6b 25 | 21 31 32 3d 77 69 6e 64 |0:block%|!12=wind|
|00000e00| 6f 77 25 3a 62 6c 6f 63 | 6b 25 21 31 36 3d 69 63 |ow%:bloc|k%!16=ic|
|00000e10| 6f 6e 25 3a c8 99 26 38 | 31 36 38 30 2c 2c 62 6c |on%:..&8|1680,,bl|
|00000e20| 6f 63 6b 25 0d 00 4c 05 | cb 0d 00 4d 06 c9 37 0d |ock%..L.|...M..7.|
|00000e30| 00 4e 4c c9 38 3a 77 69 | 6e 64 6f 77 25 3d 62 6c |.NL.8:wi|ndow%=bl|
|00000e40| 6f 63 6b 25 21 30 3a 69 | 63 6f 6e 25 3d 62 6c 6f |ock%!0:i|con%=blo|
|00000e50| 63 6b 25 21 34 3a 6b 65 | 79 25 3d 62 6c 6f 63 6b |ck%!4:ke|y%=block|
|00000e60| 25 21 32 34 3a f2 71 28 | 77 69 6e 64 6f 77 25 2c |%!24:.q(|window%,|
|00000e70| 69 63 6f 6e 25 2c 6b 65 | 79 25 29 0d 00 4f 10 c9 |icon%,ke|y%)..O..|
|00000e80| 39 3a f2 7a 28 6d 65 6e | 75 25 29 0d 00 50 07 c9 |9:.z(men|u%)..P..|
|00000e90| 31 30 0d 00 51 07 c9 31 | 31 0d 00 52 07 c9 31 32 |10..Q..1|1..R..12|
|00000ea0| 0d 00 53 29 c9 31 37 2c | 31 38 3a 6d 65 73 73 61 |..S).17,|18:messa|
|00000eb0| 67 65 25 3d 62 6c 6f 63 | 6b 25 21 31 36 3a c8 8e |ge%=bloc|k%!16:..|
|00000ec0| 6d 65 73 73 61 67 65 25 | ca 0d 00 54 1e c9 6d 65 |message%|...T..me|
|00000ed0| 73 73 61 67 65 5f 71 75 | 69 74 25 3a 66 69 6e 69 |ssage_qu|it%:fini|
|00000ee0| 73 68 65 64 25 3d b9 0d | 00 55 12 c9 6d 65 73 73 |shed%=..|.U..mess|
|00000ef0| 61 67 65 5f 6c 6f 61 64 | 25 0d 00 56 05 cb 0d 00 |age_load|%..V....|
|00000f00| 57 2d c9 31 39 3a f2 4a | 28 54 61 73 6b 4e 61 6d |W-.19:.J|(TaskNam|
|00000f10| 65 24 2c f6 24 2b 22 61 | 74 20 6c 69 6e 65 20 22 |e$,.$+"a|t line "|
|00000f20| 2b c3 28 9e 81 31 30 29 | 2c 32 29 0d 00 58 12 cb |+.(..10)|,2)..X..|
|00000f30| 3a fd 66 69 6e 69 73 68 | 65 64 25 3a e1 0d 00 59 |:.finish|ed%:...Y|
|00000f40| 20 dd a4 4e 28 65 76 65 | 6e 74 25 2c 62 6c 6f 63 | ..N(eve|nt%,bloc|
|00000f50| 6b 25 29 3a c8 8e 65 76 | 65 6e 74 25 ca 0d 00 5a |k%):..ev|ent%...Z|
|00000f60| 06 c9 30 0d 00 5b 0d cb | 3a 3d 65 76 65 6e 74 25 |..0..[..|:=event%|
|00000f70| 0d 00 5c 34 dd a4 45 28 | 77 69 6e 64 6f 77 24 29 |..\4..E(|window$)|
|00000f80| 3a 3d a4 57 28 77 69 6e | 64 6f 77 24 2c 22 3c 4f |:=.W(win|dow$,"<O|
|00000f90| 62 65 79 24 44 69 72 3e | 2e 54 65 6d 70 6c 61 74 |bey$Dir>|.Templat|
|00000fa0| 65 73 22 29 0d 00 5d 80 | dd a4 57 28 77 24 2c 74 |es")..].|..W(w$,t|
|00000fb0| 65 6d 70 6c 61 74 65 24 | 29 3a ea 63 25 3a c8 99 |emplate$|):.c%:..|
|00000fc0| 26 34 30 30 64 39 2c 2c | 74 65 6d 70 6c 61 74 65 |&400d9,,|template|
|00000fd0| 24 3a c8 99 26 34 30 30 | 64 62 2c 2c 62 6c 6f 63 |$:..&400|db,,bloc|
|00000fe0| 6b 25 2c 69 63 6f 6e 73 | 25 2c 69 63 6f 6e 5f 65 |k%,icons|%,icon_e|
|00000ff0| 6e 64 25 2c 2d 31 2c 77 | 24 2c 30 b8 2c 2c 69 63 |nd%,-1,w|$,0.,,ic|
|00001000| 6f 6e 73 25 3a e7 73 70 | 72 69 74 65 73 25 3c 3e |ons%:.sp|rites%<>|
|00001010| 30 8c 62 6c 6f 63 6b 25 | 21 36 34 3d 73 70 72 69 |0.block%|!64=spri|
|00001020| 74 65 73 25 0d 00 5e 24 | c8 99 26 34 30 30 63 31 |tes%..^$|..&400c1|
|00001030| 2c 2c 62 6c 6f 63 6b 25 | b8 63 25 3a c8 99 26 34 |,,block%|.c%:..&4|
|00001040| 30 30 64 61 3a 3d 63 25 | 0d 00 5f 42 dd f2 52 28 |00da:=c%|.._B..R(|
|00001050| 77 69 6e 64 6f 77 25 2c | 73 74 61 74 65 25 29 3a |window%,|state%):|
|00001060| 21 62 6c 6f 63 6b 25 3d | 77 69 6e 64 6f 77 25 3a |!block%=|window%:|
|00001070| e7 73 74 61 74 65 25 3d | 30 8c c8 99 26 34 30 30 |.state%=|0...&400|
|00001080| 63 62 2c 2c 62 6c 6f 63 | 6b 25 0d 00 60 16 c8 99 |cb,,bloc|k%..`...|
|00001090| 26 34 30 30 63 35 2c 2c | 62 6c 6f 63 6b 25 3a e1 |&400c5,,|block%:.|
|000010a0| 0d 00 61 51 dd f2 4d 28 | 77 69 6e 64 6f 77 25 29 |..aQ..M(|window%)|
|000010b0| 3a 21 62 6c 6f 63 6b 25 | 3d 77 69 6e 64 6f 77 25 |:!block%|=window%|
|000010c0| 3a c8 99 26 34 30 30 63 | 62 2c 2c 62 6c 6f 63 6b |:..&400c|b,,block|
|000010d0| 25 3a 62 6c 6f 63 6b 25 | 21 32 38 3d 2d 31 3a c8 |%:block%|!28=-1:.|
|000010e0| 99 26 34 30 30 63 35 2c | 2c 62 6c 6f 63 6b 25 3a |.&400c5,|,block%:|
|000010f0| e1 0d 00 62 33 dd f2 57 | 28 77 69 6e 64 6f 77 25 |...b3..W|(window%|
|00001100| 29 3a 21 62 6c 6f 63 6b | 25 3d 77 69 6e 64 6f 77 |):!block|%=window|
|00001110| 25 3a c8 99 26 34 30 30 | 63 36 2c 2c 62 6c 6f 63 |%:..&400|c6,,bloc|
|00001120| 6b 25 3a e1 0d 00 63 22 | dd a4 47 28 62 6c 6f 63 |k%:...c"|..G(bloc|
|00001130| 6b 25 29 3d 62 6c 6f 63 | 6b 25 21 34 2d 62 6c 6f |k%)=bloc|k%!4-blo|
|00001140| 63 6b 25 21 32 30 0d 00 | 64 23 dd a4 43 28 62 6c |ck%!20..|d#..C(bl|
|00001150| 6f 63 6b 25 29 3d 62 6c | 6f 63 6b 25 21 31 36 2d |ock%)=bl|ock%!16-|
|00001160| 62 6c 6f 63 6b 25 21 32 | 34 0d 00 65 36 dd a4 4a |block%!2|4..e6..J|
|00001170| 28 53 70 72 69 74 65 24 | 29 3a 3d a4 46 28 2d 31 |(Sprite$|):=.F(-1|
|00001180| 2c 30 2c 30 2c 36 38 2c | 36 38 2c 31 32 32 39 30 |,0,0,68,|68,12290|
|00001190| 2c 53 70 72 69 74 65 24 | 2c 30 2c 30 2c 30 29 0d |,Sprite$|,0,0,0).|
|000011a0| 00 66 9f dd a4 46 28 77 | 69 6e 64 6f 77 25 2c 69 |.f...F(w|indow%,i|
|000011b0| 78 25 2c 69 79 25 2c 69 | 77 25 2c 69 68 25 2c 66 |x%,iy%,i|w%,ih%,f|
|000011c0| 6c 61 67 25 2c 74 65 78 | 74 24 2c 64 31 25 2c 64 |lag%,tex|t$,d1%,d|
|000011d0| 32 25 2c 64 33 25 29 3a | 62 6c 6f 63 6b 25 21 30 |2%,d3%):|block%!0|
|000011e0| 3d 77 69 6e 64 6f 77 25 | 3a 62 6c 6f 63 6b 25 21 |=window%|:block%!|
|000011f0| 34 3d 69 78 25 3a 62 6c | 6f 63 6b 25 21 38 3d 69 |4=ix%:bl|ock%!8=i|
|00001200| 79 25 3a 62 6c 6f 63 6b | 25 21 31 32 3d 69 78 25 |y%:block|%!12=ix%|
|00001210| 2b 69 77 25 3a 62 6c 6f | 63 6b 25 21 31 36 3d 69 |+iw%:blo|ck%!16=i|
|00001220| 79 25 2b 69 68 25 3a 62 | 6c 6f 63 6b 25 21 32 30 |y%+ih%:b|lock%!20|
|00001230| 3d 66 6c 61 67 25 3a e7 | 64 31 25 3d 30 8c 0d 00 |=flag%:.|d1%=0...|
|00001240| 67 16 24 28 62 6c 6f 63 | 6b 25 2b 32 34 29 3d 74 |g.$(bloc|k%+24)=t|
|00001250| 65 78 74 24 0d 00 68 2f | cc 3a 62 6c 6f 63 6b 25 |ext$..h/|.:block%|
|00001260| 21 32 34 3d 64 31 25 3a | 62 6c 6f 63 6b 25 21 32 |!24=d1%:|block%!2|
|00001270| 38 3d 64 32 25 3a 62 6c | 6f 63 6b 25 21 33 32 3d |8=d2%:bl|ock%!32=|
|00001280| 64 33 25 0d 00 69 23 cd | 3a c8 99 26 34 30 30 63 |d3%..i#.|:..&400c|
|00001290| 32 2c 2c 62 6c 6f 63 6b | 25 b8 69 63 6f 6e 25 3a |2,,block|%.icon%:|
|000012a0| 3d 69 63 6f 6e 25 0d 00 | 6a 7c dd f2 5a 28 77 69 |=icon%..|j|..Z(wi|
|000012b0| 6e 64 6f 77 25 2c 69 63 | 6f 6e 25 2c 74 65 78 74 |ndow%,ic|on%,text|
|000012c0| 24 29 3a 62 6c 6f 63 6b | 25 21 30 3d 77 69 6e 64 |$):block|%!0=wind|
|000012d0| 6f 77 25 3a 62 6c 6f 63 | 6b 25 21 34 3d 69 63 6f |ow%:bloc|k%!4=ico|
|000012e0| 6e 25 3a c8 99 26 34 30 | 30 63 65 2c 2c 62 6c 6f |n%:..&40|0ce,,blo|
|000012f0| 63 6b 25 3a e7 28 28 62 | 6c 6f 63 6b 25 21 32 34 |ck%:.((b|lock%!24|
|00001300| 29 80 32 35 36 29 3d 30 | 85 31 2c 22 49 63 6f 6e |).256)=0|.1,"Icon|
|00001310| 20 69 73 6e 27 74 20 69 | 6e 64 69 72 65 63 74 65 | isn't i|ndirecte|
|00001320| 64 22 0d 00 6b 60 24 28 | 62 6c 6f 63 6b 25 21 32 |d"..k`$(|block%!2|
|00001330| 38 29 3d 74 65 78 74 24 | 3a 62 6c 6f 63 6b 25 21 |8)=text$|:block%!|
|00001340| 30 3d 77 69 6e 64 6f 77 | 25 3a 62 6c 6f 63 6b 25 |0=window|%:block%|
|00001350| 21 34 3d 69 63 6f 6e 25 | 3a 62 6c 6f 63 6b 25 21 |!4=icon%|:block%!|
|00001360| 38 3d 30 3a 62 6c 6f 63 | 6b 25 21 31 32 3d 30 3a |8=0:bloc|k%!12=0:|
|00001370| c8 99 26 34 30 30 63 64 | 2c 2c 62 6c 6f 63 6b 25 |..&400cd|,,block%|
|00001380| 3a e1 0d 00 6c 76 dd a4 | 41 28 77 69 6e 64 6f 77 |:...lv..|A(window|
|00001390| 25 2c 69 63 6f 6e 25 29 | 3a 62 6c 6f 63 6b 25 21 |%,icon%)|:block%!|
|000013a0| 30 3d 77 69 6e 64 6f 77 | 25 3a 62 6c 6f 63 6b 25 |0=window|%:block%|
|000013b0| 21 34 3d 69 63 6f 6e 25 | 3a c8 99 26 34 30 30 63 |!4=icon%|:..&400c|
|000013c0| 65 2c 2c 62 6c 6f 63 6b | 25 3a e7 28 28 62 6c 6f |e,,block|%:.((blo|
|000013d0| 63 6b 25 21 32 34 29 80 | 32 35 36 29 3d 30 85 31 |ck%!24).|256)=0.1|
|000013e0| 2c 22 49 63 6f 6e 20 69 | 73 6e 27 74 20 69 6e 64 |,"Icon i|sn't ind|
|000013f0| 69 72 65 63 74 65 64 22 | 0d 00 6d 11 3d 24 28 62 |irected"|..m.=$(b|
|00001400| 6c 6f 63 6b 25 21 32 38 | 29 0d 00 6e 64 dd f2 45 |lock%!28|)..nd..E|
|00001410| 28 77 69 6e 64 6f 77 25 | 2c 69 63 6f 6e 25 29 3a |(window%|,icon%):|
|00001420| 62 6c 6f 63 6b 25 21 30 | 3d 77 69 6e 64 6f 77 25 |block%!0|=window%|
|00001430| 3a 62 6c 6f 63 6b 25 21 | 34 3d 69 63 6f 6e 25 3a |:block%!|4=icon%:|
|00001440| 62 6c 6f 63 6b 25 21 38 | 3d 30 3a 62 6c 6f 63 6b |block%!8|=0:block|
|00001450| 25 21 31 32 3d 31 3c 3c | 32 32 3a c8 99 26 34 30 |%!12=1<<|22:..&40|
|00001460| 30 63 64 2c 2c 62 6c 6f | 63 6b 25 3a e1 0d 00 6f |0cd,,blo|ck%:...o|
|00001470| 68 dd f2 53 28 77 69 6e | 64 6f 77 25 2c 69 63 6f |h..S(win|dow%,ico|
|00001480| 6e 25 29 3a 62 6c 6f 63 | 6b 25 21 30 3d 77 69 6e |n%):bloc|k%!0=win|
|00001490| 64 6f 77 25 3a 62 6c 6f | 63 6b 25 21 34 3d 69 63 |dow%:blo|ck%!4=ic|
|000014a0| 6f 6e 25 3a 62 6c 6f 63 | 6b 25 21 38 3d 31 3c 3c |on%:bloc|k%!8=1<<|
|000014b0| 32 32 3a 62 6c 6f 63 6b | 25 21 31 32 3d 31 3c 3c |22:block|%!12=1<<|
|000014c0| 32 32 3a c8 99 26 34 30 | 30 63 64 2c 2c 62 6c 6f |22:..&40|0cd,,blo|
|000014d0| 63 6b 25 3a e1 0d 00 70 | 22 dd f2 58 3a f2 61 28 |ck%:...p|"..X:.a(|
|000014e0| 22 3c 4f 62 65 79 24 44 | 69 72 3e 2e 53 70 72 69 |"<Obey$D|ir>.Spri|
|000014f0| 74 65 73 22 29 3a e1 0d | 00 71 a2 dd f2 61 28 70 |tes"):..|.q...a(p|
|00001500| 61 74 68 6e 61 6d 65 24 | 29 3a ea 53 25 2c 54 25 |athname$|):.S%,T%|
|00001510| 3a 53 25 3d 8e 22 3c 4f | 62 65 79 24 44 69 72 3e |:S%=."<O|bey$Dir>|
|00001520| 2e 53 70 72 69 74 65 73 | 22 3a 54 25 3d a2 23 53 |.Sprites|":T%=.#S|
|00001530| 25 2b 31 36 3a d9 23 53 | 25 3a de 73 70 72 69 74 |%+16:.#S|%:.sprit|
|00001540| 65 73 25 54 25 2c 73 70 | 6e 61 6d 65 25 31 32 3a |es%T%,sp|name%12:|
|00001550| 21 73 70 72 69 74 65 73 | 25 3d 54 25 3a 73 70 72 |!sprites|%=T%:spr|
|00001560| 69 74 65 73 25 21 38 3d | 30 3a c8 99 34 36 2c 32 |ites%!8=|0:..46,2|
|00001570| 36 35 2c 73 70 72 69 74 | 65 73 25 3a c8 99 34 36 |65,sprit|es%:..46|
|00001580| 2c 32 36 36 2c 73 70 72 | 69 74 65 73 25 2c 70 61 |,266,spr|ites%,pa|
|00001590| 74 68 6e 61 6d 65 24 3a | e1 0d 00 72 3d dd a4 4d |thname$:|...r=..M|
|000015a0| 28 6d 65 6e 75 24 29 3a | ea 6d 65 6e 75 25 3a de |(menu$):|.menu%:.|
|000015b0| 6d 65 6e 75 25 32 38 2b | a4 53 20 28 6d 65 6e 75 |menu%28+|.S (menu|
|000015c0| 24 29 2a 32 34 3a 3d a4 | 42 28 6d 65 6e 75 25 2c |$)*24:=.|B(menu%,|
|000015d0| 6d 65 6e 75 24 29 0d 00 | 73 42 dd a4 53 28 6d 65 |menu$)..|sB..S(me|
|000015e0| 6e 75 24 29 3a ea 6e 25 | 2c 6a 25 3a 6e 25 3d 30 |nu$):.n%|,j%:n%=0|
|000015f0| 3a 6a 25 3d 30 3a f5 3a | 6a 25 3d a7 6d 65 6e 75 |:j%=0:.:|j%=.menu|
|00001600| 24 2c 22 5c 22 2c 6a 25 | 2b 31 29 3a e7 6a 25 3c |$,"\",j%|+1):.j%<|
|00001610| 3e 30 8c 6e 25 2b 3d 31 | 0d 00 74 0d fd 6a 25 3d |>0.n%+=1|..t..j%=|
|00001620| 30 3a 3d 6e 25 0d 00 75 | f3 dd a4 42 28 6d 65 6e |0:=n%..u|...B(men|
|00001630| 75 25 2c 6d 65 6e 75 24 | 29 3a ea 79 70 6f 73 25 |u%,menu$|):.ypos%|
|00001640| 2c 77 69 64 74 68 25 2c | 6c 65 6e 67 74 68 25 2c |,width%,|length%,|
|00001650| 6b 25 3a 6d 65 6e 75 25 | 3f 31 32 3d 37 3a 6d 65 |k%:menu%|?12=7:me|
|00001660| 6e 75 25 3f 31 33 3d 32 | 3a 6d 65 6e 75 25 3f 31 |nu%?13=2|:menu%?1|
|00001670| 34 3d 37 3a 6d 65 6e 75 | 25 3f 31 35 3d 30 3a 6d |4=7:menu|%?15=0:m|
|00001680| 65 6e 75 25 21 31 36 3d | 31 34 30 3a 6d 65 6e 75 |enu%!16=|140:menu|
|00001690| 25 21 32 30 3d 34 34 3a | 6d 65 6e 75 25 21 32 34 |%!20=44:|menu%!24|
|000016a0| 3d 30 3a 70 74 72 25 3d | 6d 65 6e 75 25 2b 32 38 |=0:ptr%=|menu%+28|
|000016b0| 3a 24 6d 65 6e 75 25 3d | c0 6d 65 6e 75 24 2c a7 |:$menu%=|.menu$,.|
|000016c0| 6d 65 6e 75 24 2c 22 5c | 22 29 2d 31 29 3a 77 69 |menu$,"\|")-1):wi|
|000016d0| 64 74 68 25 3d a9 28 c0 | 6d 65 6e 75 24 2c a7 6d |dth%=.(.|menu$,.m|
|000016e0| 65 6e 75 24 2c 22 5c 22 | 29 2d 31 29 29 3a 6d 65 |enu$,"\"|)-1)):me|
|000016f0| 6e 75 24 2b 3d 22 5c 22 | 3a 4d 65 6e 75 5f 4e 6f |nu$+="\"|:Menu_No|
|00001700| 4f 66 45 6e 74 72 69 65 | 73 25 3d 30 3a c8 95 6d |OfEntrie|s%=0:..m|
|00001710| 65 6e 75 24 3c 3e 22 22 | 0d 00 76 2b 6d 65 6e 75 |enu$<>""|..v+menu|
|00001720| 24 3d c1 6d 65 6e 75 24 | 2c a7 6d 65 6e 75 24 2c |$=.menu$|,.menu$,|
|00001730| 22 5c 22 29 2b 31 29 3a | e7 6d 65 6e 75 24 3c 3e |"\")+1):|.menu$<>|
|00001740| 22 22 8c 0d 00 77 5c 21 | 70 74 72 25 3d 30 3a 70 |""...w\!|ptr%=0:p|
|00001750| 74 72 25 21 34 3d 2d 31 | 3a 70 74 72 25 21 38 3d |tr%!4=-1|:ptr%!8=|
|00001760| 26 37 30 30 30 30 32 31 | 3a 6c 65 6e 67 74 68 25 |&7000021|:length%|
|00001770| 3d a7 6d 65 6e 75 24 2c | 22 5c 22 29 2d 31 3a 6b |=.menu$,|"\")-1:k|
|00001780| 25 3d a7 c0 6d 65 6e 75 | 24 2c 6c 65 6e 67 74 68 |%=..menu|$,length|
|00001790| 25 29 2c 22 3e 22 29 3a | e7 6b 25 3c 3e 30 8c 0d |%),">"):|.k%<>0..|
|000017a0| 00 78 38 73 25 3d a0 28 | c1 6d 65 6e 75 24 2c 6b |.x8s%=.(|.menu$,k|
|000017b0| 25 2b 31 2c 6c 65 6e 67 | 74 68 25 2d 6b 25 29 29 |%+1,leng|th%-k%))|
|000017c0| 3a 70 74 72 25 21 34 3d | 73 25 3a 6c 65 6e 67 74 |:ptr%!4=|s%:lengt|
|000017d0| 68 25 3d 6b 25 2d 31 0d | 00 79 3f cd 3a 24 28 70 |h%=k%-1.|.y?.:$(p|
|000017e0| 74 72 25 2b 31 32 29 3d | c0 6d 65 6e 75 24 2c 6c |tr%+12)=|.menu$,l|
|000017f0| 65 6e 67 74 68 25 29 3a | e7 6c 65 6e 67 74 68 25 |ength%):|.length%|
|00001800| 3e 77 69 64 74 68 25 8c | 77 69 64 74 68 25 3d 6c |>width%.|width%=l|
|00001810| 65 6e 67 74 68 25 0d 00 | 7a 21 70 74 72 25 2b 3d |ength%..|z!ptr%+=|
|00001820| 32 34 3a 4d 65 6e 75 5f | 4e 6f 4f 66 45 6e 74 72 |24:Menu_|NoOfEntr|
|00001830| 69 65 73 25 2b 3d 31 0d | 00 7b 3b cd 3a ce 3a 6d |ies%+=1.|.{;.:.:m|
|00001840| 65 6e 75 25 21 31 36 3d | 31 36 2a 28 77 69 64 74 |enu%!16=|16*(widt|
|00001850| 68 25 2b 31 29 3a 70 74 | 72 25 21 2d 32 34 3d 70 |h%+1):pt|r%!-24=p|
|00001860| 74 72 25 21 2d 32 34 84 | 31 32 38 3a 3d 6d 65 6e |tr%!-24.|128:=men|
|00001870| 75 25 0d 00 7c 25 dd a4 | 5a 28 6c 65 76 65 6c 25 |u%..|%..|Z(level%|
|00001880| 29 3d 28 62 6c 6f 63 6b | 25 21 28 34 2a 6c 65 76 |)=(block|%!(4*lev|
|00001890| 65 6c 25 29 29 2b 31 0d | 00 7d 75 dd f2 4b 28 78 |el%))+1.|.}u..K(x|
|000018a0| 25 2c 79 25 29 3a ea 6e | 25 3a 6e 25 3d 30 3a c8 |%,y%):.n|%:n%=0:.|
|000018b0| 95 28 28 42 61 72 5f 4d | 65 6e 75 25 21 28 32 38 |.((Bar_M|enu%!(28|
|000018c0| 2b 6e 25 2a 32 34 29 29 | 80 31 32 38 29 3d 30 3a |+n%*24))|.128)=0:|
|000018d0| 6e 25 2b 3d 31 3a ce 3a | c8 99 26 34 30 30 64 34 |n%+=1:.:|..&400d4|
|000018e0| 2c 2c 42 61 72 5f 4d 65 | 6e 75 25 2c 78 25 2d 36 |,,Bar_Me|nu%,x%-6|
|000018f0| 34 2c 39 36 2b 6e 25 2a | 34 34 3a 6d 65 6e 75 25 |4,96+n%*|44:menu%|
|00001900| 3d 42 61 72 5f 4d 65 6e | 75 25 3a e1 0d 00 7e 3e |=Bar_Men|u%:...~>|
|00001910| dd f2 54 28 4d 65 6e 75 | 25 2c 78 25 2c 79 25 29 |..T(Menu|%,x%,y%)|
|00001920| 3a 6d 65 6e 75 25 3d 4d | 65 6e 75 25 3a c8 99 26 |:menu%=M|enu%:..&|
|00001930| 34 30 30 64 34 2c 2c 6d | 65 6e 75 25 2c 78 25 2d |400d4,,m|enu%,x%-|
|00001940| 36 34 2c 79 25 2b 32 30 | 3a e1 0d 00 7f 4b dd f2 |64,y%+20|:....K..|
|00001950| 56 28 74 69 74 6c 65 24 | 2c 6d 65 73 73 61 67 65 |V(title$|,message|
|00001960| 24 2c 62 75 74 74 6f 6e | 25 29 3a ea 72 65 73 70 |$,button|%):.resp|
|00001970| 6f 6e 73 65 25 3a 24 28 | 62 6c 6f 63 6b 25 2b 34 |onse%:$(|block%+4|
|00001980| 29 3d 6d 65 73 73 61 67 | 65 24 3a c8 8e 62 75 74 |)=messag|e$:..but|
|00001990| 74 6f 6e 25 ca 0d 00 80 | 12 c9 32 3a 72 65 73 70 |ton%....|..2:resp|
|000019a0| 6f 6e 73 65 25 3d 31 0d | 00 81 13 c9 31 3a 72 65 |onse%=1.|....1:re|
|000019b0| 73 70 6f 6e 73 65 25 3d | 31 35 0d 00 82 1a c9 33 |sponse%=|15.....3|
|000019c0| 3a 72 65 73 70 6f 6e 73 | 65 25 3d 28 31 3c 3c 35 |:respons|e%=(1<<5|
|000019d0| 29 2b 31 36 0d 00 83 1a | c9 34 3a 72 65 73 70 6f |)+16....|.4:respo|
|000019e0| 6e 73 65 25 3d 28 31 3c | 3c 36 29 2b 31 36 0d 00 |nse%=(1<|<6)+16..|
|000019f0| 84 11 7f 72 65 73 70 6f | 6e 73 65 25 3d 31 36 0d |...respo|nse%=16.|
|00001a00| 00 85 33 cb 3a c8 99 26 | 34 30 30 64 66 2c 62 6c |..3.:..&|400df,bl|
|00001a10| 6f 63 6b 25 2c 72 65 73 | 70 6f 6e 73 65 25 2c 74 |ock%,res|ponse%,t|
|00001a20| 69 74 6c 65 24 b8 2c 72 | 65 73 70 6f 6e 73 65 25 |itle$.,r|esponse%|
|00001a30| 3a e1 0d 00 86 30 dd f2 | 4a 28 74 69 74 6c 65 24 |:....0..|J(title$|
|00001a40| 2c 6d 65 73 73 61 67 65 | 24 29 3a f2 56 28 74 69 |,message|$):.V(ti|
|00001a50| 74 6c 65 24 2c 6d 65 73 | 73 61 67 65 24 2c 30 29 |tle$,mes|sage$,0)|
|00001a60| 3a e1 0d 00 87 44 dd f2 | 41 28 77 69 6e 64 6f 77 |:....D..|A(window|
|00001a70| 25 2c 69 63 6f 6e 25 2c | 6c 65 6e 67 74 68 25 29 |%,icon%,|length%)|
|00001a80| 3a c8 99 26 34 30 30 64 | 32 2c 77 69 6e 64 6f 77 |:..&400d|2,window|
|00001a90| 25 2c 69 63 6f 6e 25 2c | 2c 2c 2d 31 2c 6c 65 6e |%,icon%,|,,-1,len|
|00001aa0| 67 74 68 25 3a e1 0d ff | |gth%:...| |
+--------+-------------------------+-------------------------+--------+--------+